Pascal Super Library/Pascal Super Library (CW International)(1997).bin/DELPHI32/GRAPHICS/IMGLIB95/DMITOOLB.DF_/DMITOOLB.DF/DMITOOLB.txt

Text File | 1996-03-31 | 23KB | 543 lines

object TIMIToolBar: TTIMIToolBar
  Left = 12
  Top = 19
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsDialog
  Caption = 'DB Image Toolbar'
  ClientHeight = 28
  ClientWidth = 587
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  PixelsPerInch = 96
  Position = poDefault
  OnActivate = FormActivate
  OnDestroy = FormDestroy
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 587
    Height = 28
    Align = alClient
    BevelInner = bvRaised
    BevelOuter = bvNone
    TabOrder = 0
    object ScanImage: TSpeedButton
      Left = 1
      Top = 2
      Width = 24
      Height = 24
      Hint = 'Scan an Image'
      Glyph.Data = {
        66010000424D6601000000000000760000002800000014000000140000000100
        040000000000F000000000000000000000001000000010000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333300003333333333333333333300003333033333333333333300003333
        3000333333333333000033333333033333333333000033333333303333333333
        0000333333338088333333330000333333300000833333330000333333077777
        08333333000033333307FFFF08333333000033333307FFFF0833333300003333
        3307FFFF0888333300003330007FFFFFF00083330000330777FFFFFFFFFF0833
        00003307FAAAAAAAAAFF083300003307FFFFFFFFFFFF08330000333000000000
        0000833300003333333333333333333300003333333333333333333300003333
        33333333333333330000}
      ParentShowHint = False
      ShowHint = True
      OnClick = ScanImageClick
    end
    object ScanSelect: TSpeedButton
      Left = 24
      Top = 2
      Width = 25
      Height = 24
      Hint = 'Scanner Select'
      Glyph.Data = {
        80010000424D8001000000000000760000002800000014000000140000000100
        040000000000F000000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333334
        444444440000333333333334333B33340000333303333334333B333400003333
        30003334BBBBBBB40000333333330334333B3334000033333333303444444444
        0000333333338088333333330000333333300000833333330000333333077777
        0833333300003333330799990833333300003333330799990833333300003333
        3307999908883333000033300079999990008333000033077799999999990833
        000033079AAAAAAAAA9908330000330799999999999908330000333000000000
        0000833300003333333333333333333300003333333333333333333300003333
        3333333333333333000000000000000000000000000000000000000000000000
        00000000}
      ParentShowHint = False
      ShowHint = True
      OnClick = ScanSelectClick
    end
    object ImageOpen: TSpeedButton
      Left = 48
      Top = 2
      Width = 22
      Height = 24
      Hint = 'New Image (Edit)'
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033BBBBBBBBBB
        BB33337777777777777F33BB00BBBBBBBB33337F77333333F37F33BB0BBBBBB0
        BB33337F73F33337FF7F33BBB0BBBB000B33337F37FF3377737F33BBB00BB00B
        BB33337F377F3773337F33BBBB0B00BBBB33337F337F7733337F33BBBB000BBB
        BB33337F33777F33337F33EEEE000EEEEE33337F3F777FFF337F33EE0E80000E
        EE33337F73F77773337F33EEE0800EEEEE33337F37377F33337F33EEEE000EEE
        EE33337F33777F33337F33EEEEE00EEEEE33337F33377FF3337F33EEEEEE00EE
        EE33337F333377F3337F33EEEEEE00EEEE33337F33337733337F33EEEEEEEEEE
        EE33337FFFFFFFFFFF7F33EEEEEEEEEEEE3333777777777777730000}
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = ImageOpenClick
    end
    object OpenThumbs: TSpeedButton
      Left = 69
      Top = 2
      Width = 23
      Height = 24
      Hint = 'Previews'
      Glyph.Data = {
        42010000424D4201000000000000760000002800000011000000110000000100
        040000000000CC00000000000000000000001000000010000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
        DDDDD0000000DDDDDDDDDDDDDDDDD0000000DD0000000000000DD0000000D0FF
        FFFFFFFFFFF0D0000000D0F00000000000F0D0000000D0FFFFFFFFFFFFF0D000
        0000D0F00000000000F0D0000000D0FFFFFFFFFFFFF0D0000000D0F000000000
        00F0D0000000D0FFFFFFFFFFFFF0D0000000D0F00000000000F0D0000000D0FF
        FFFFFFFFFFF0D0000000D0F00000000000F0D0000000D0FFFFFFFFFFFFF0D000
        0000DD0000000000000DD0000000DDDDDDDDDDDDDDDDD0000000DDDDDDDDDDDD
        DDDDD0000000}
      ParentShowHint = False
      ShowHint = True
      OnClick = OpenThumbsClick
    end
    object ImageSave: TSpeedButton
      Left = 91
      Top = 2
      Width = 22
      Height = 24
      Hint = 'Save to File'
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
        7700333333337777777733333333008088003333333377F73377333333330088
        88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
        000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
        FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
        99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
        99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
        99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
        93337FFFF7737777733300000033333333337777773333333333}
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = ImageSaveClick
    end
    object PrintImage: TSpeedButton
      Left = 112
      Top = 2
      Width = 22
      Height = 24
      Hint = 'Print Image'
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
        00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
        8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
        8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
        8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
        03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
        03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
        33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
        33333337FFFF7733333333300000033333333337777773333333}
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = PrintImageClick
    end
    object CutImage: TSpeedButton
      Left = 133
      Top = 2
      Width = 22
      Height = 24
      Hint = 'Cut'
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333FF3333333333333003333333333333377F33333333333307
        733333FFF333337773333C003333307733333777FF333777FFFFC0CC03330770
        000077777FF377777777C033C03077FFFFF077FF77F777FFFFF7CC00000F7777
        777077777777777777773CCCCC00000000003777777777777777333330030FFF
        FFF03333F77F7F3FF3F7333C0C030F00F0F03337777F7F77373733C03C030FFF
        FFF03377F77F7F3F333733C03C030F0FFFF03377F7737F733FF733C000330FFF
        0000337777F37F3F7777333CCC330F0F0FF0333777337F737F37333333330FFF
        0F03333333337FFF7F7333333333000000333333333377777733}
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = CutImageClick
    end
    object CopyImage: TSpeedButton
      Left = 154
      Top = 2
      Width = 22
      Height = 24
      Hint = 'Copy'
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330B7FFF
        FFB0333333777F3333773333330B7FFFFFB0333333777F3333773333330B7FFF
        FFB0333333777F3333773333330B7FFFFFB03FFFFF777FFFFF77000000000077
        007077777777777777770FFFFFFFF00077B07F33333337FFFF770FFFFFFFF000
        7BB07F3FF3FFF77FF7770F00F000F00090077F77377737777F770FFFFFFFF039
        99337F3FFFF3F7F777FF0F0000F0F09999937F7777373777777F0FFFFFFFF999
        99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
        99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
        93337FFFF7737777733300000033333333337777773333333333}
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = CopyImageClick
    end
    object PasteImage: TSpeedButton
      Left = 175
      Top = 2
      Width = 22
      Height = 24
      Hint = 'Paste'
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330FFFFF
        FFF03333337F3FFFF3F73333330F0000F0F03333337F777737373333330FFFFF
        FFF033FFFF7FFF33FFF77000000007F00000377777777FF777770BBBBBBBB0F0
        FF037777777777F7F3730B77777BB0F0F0337777777777F7F7330B7FFFFFB0F0
        0333777F333377F77F330B7FFFFFB0009333777F333377777FF30B7FFFFFB039
        9933777F333377F777FF0B7FFFFFB0999993777F33337777777F0B7FFFFFB999
        9999777F3333777777770B7FFFFFB0399933777FFFFF77F777F3070077007039
        99337777777777F777F30B770077B039993377FFFFFF77F777330BB7007BB999
        93337777FF777777733370000000073333333777777773333333}
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = PasteImageClick
    end
    object ZoomInImage: TSpeedButton
      Left = 196
      Top = 2
      Width = 22
      Height = 24
      Hint = 'Zoom In (Image must be stretched)'
      Glyph.Data = {
        4E010000424D4E01000000000000760000002800000012000000120000000100
        040000000000D800000000000000000000001000000010000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
        DDDDDD000000DDDDDDDDDDDDDDDDDD000000DDDDDDDDDDDDDDDDDD000000DD00
        0DDDD000DDDDDD000000D07E70DD07E70DDDDD000000D0E7E0DD0E7E0DDDDD00
        0000D0FE70DD0FE70DDDDD000000D0EFE0DD0EFE0DDDDD000000D8000D00D000
        8DDDDD000000DD0DDDDDDDDD0DDD0D000000DDD0DDD0DDDDD0DD0D000000DDDD
        0DD0DDDDDD0D0D000000DDDDD0D0DDDDDDD0DD000000DDDDDD0DDDDDDDDDDD00
        0000DDDDDDDDDDDDDDDDDD000000DDDDDDDDDDDDDDDDDD000000DDDDDDDDDDDD
        DDDDDD000000DDDDDDDDDDDDDDDDDD000000}
      ParentShowHint = False
      ShowHint = True
      OnClick = ZoomInImageClick
    end
    object ZoomOutImage: TSpeedButton
      Left = 217
      Top = 2
      Width = 22
      Height = 24
      Hint = 'Zoom Out (Image must be stretched)'
      Glyph.Data = {
        E6000000424DE60000000000000076000000280000000E0000000E0000000100
        0400000000007000000000000000000000001000000010000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3300333333333333330033333333333333003300033300033300307F70307F70
        330030F7F030F7F0330030FF7030FF7033003800070700033300330333333303
        3300330303333303030033303333333033003333333333333300333333333333
        33003333333333333300}
      ParentShowHint = False
      ShowHint = True
      OnClick = ZoomOutImageClick
    end
    object RotateImage: TSpeedButton
      Left = 238
      Top = 2
      Width = 22
      Height = 24
      Hint = 'Rotate Image '
      Glyph.Data = {
        42010000424D4201000000000000760000002800000011000000110000000100
        040000000000CC00000000000000000000001000000010000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777700000007777777777777777700000007777777777777777700000007000
        0007700000077000000070777707705555077000000077077707705550777000
        0000770777077055507770000000777077077055077770000000777077077055
        0777700000007777070770507777700000007777070770507777700000007777
        7007700777777000000077777007700777777000000077777707707777777000
        0000777777777777777770000000777777777777777770000000777777777777
        777770000000}
      ParentShowHint = False
      ShowHint = True
      OnClick = RotateImageClick
    end
    object FlipImage: TSpeedButton
      Left = 259
      Top = 2
      Width = 22
      Height = 24
      Hint = 'Flip Image '
      Glyph.Data = {
        42010000424D4201000000000000760000002800000011000000110000000100
        040000000000CC00000000000000000000001000000010000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777700000007777777777777777700000007000000000700000000000007700
        7777707055550000000077770077707055507000000077777700707055507000
        0000777777770070550770000000777777777770550770000000777777777770
        5077700000007747777777705077700000007747774777700777700000007774
        7744777007777000000077774444477077777000000077777744777777777000
        0000777777477777777770000000777777777777777770000000777777777777
        777770000000}
      ParentShowHint = False
      ShowHint = True
      OnClick = FlipImageClick
    end
    object ResetImage: TSpeedButton
      Left = 280
      Top = 2
      Width = 22
      Height = 24
      Hint = 'Reset Image'
      Glyph.Data = {
        90020000424D9002000000000000760000002800000040000000100000000100
        0400000000000002000000000000000000000000000000000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00331111133333
        333333FFFFF33333333333222223332222233333333333444443333199933333
        333333388883333333333332AAA333AAA2333333333333CCC433333199933333
        1133333888833333FF333332AAA333AAA2333334433333CCC433339919933333
        99133388F883333388F333AA2AA333AA2A2333CC433333CC4C43339133933333
        3913338F33833333388F33A233A333A33A2333C4333333C33CC4391333333333
        339138F333333333338F3A233333333333A23C433333333333C4391333333333
        339138F333333333338F3A233333333333A23C433333333333C4391333333333
        339138F333333333338F3A233333333333A23C433333333333C4391333333333
        339138F333333333338F3A233333333333A23C433333333333C4391333333333
        339138F333333333338F3A233333333333A23C433333333333C4339133333333
        3991338F33333333388F33A2333333333AA233C4333333333CC4339913333333
        99133388F333333388F333AA23333333AA2333CC43333333CC43333991333339
        913333388F3333388F33333AA233333AA233333CC433333CC433333399111119
        1333333388FFFFF8F3333333AA22222A23333333CC44444C4333333333999993
        33333333338888833333333333AAAAA33333333333CCCCC33333333333333333
        3333333333333333333333333333333333333333333333333333000000000000
        0000000000000000000000000000000000000000}
      NumGlyphs = 4
      ParentShowHint = False
      ShowHint = True
      OnClick = ResetImageClick
    end
    object StretchImage: TSpeedButton
      Left = 301
      Top = 2
      Width = 22
      Height = 24
      Hint = 'Stretch Image'
      AllowAllUp = True
      GroupIndex = 1
      Glyph.Data = {
        42010000424D4201000000000000760000002800000011000000110000000100
        040000000000CC00000000000000000000001000000010000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777700000007770777777777077700000007778777777777877700000007080
        8080808080807000000077788888888888777000000077708888888880777000
        0000777888888888887770000000777088888888807770000000777888888888
        8877700000007770888888888077700000007778888888888877700000007770
        8888888880777000000077788888888888777000000070808080808080807000
        0000777877777777787770000000777077777777707770000000777777777777
        777770000000}
      ParentShowHint = False
      ShowHint = True
      OnClick = StretchImageClick
    end
    object StretchImageratio: TSpeedButton
      Left = 322
      Top = 2
      Width = 22
      Height = 24
      Hint = 'Stretch Image with ratio'
      AllowAllUp = True
      GroupIndex = 1
      Glyph.Data = {
        42010000424D4201000000000000760000002800000011000000110000000100
        040000000000CC00000000000000000000001000000010000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777700000007770777777777077700000007778777777777877700000007080
        0000000000807000000077700000000000777000000077700777077700777000
        0000777007770777007770000000777007770777007770000000777000000000
        0077700000007770077707770077700000007770077707770077700000007770
        0777077700777000000077700000000000777000000070800000000000807000
        0000777877777777787770000000777077777777707770000000777777777777
        777770000000}
      ParentShowHint = False
      ShowHint = True
      OnClick = StretchImageratioClick
    end
    object ScrollMessage: TSpeedButton
      Left = 343
      Top = 2
      Width = 22
      Height = 24
      Hint = 'Scrolling Message Editor'
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333333333333333333333333333333333333333333333333
        33333F3F3F3F3F3F3F3F03030303030303037373737373737373333333333333
        33333F3FFFFFFFFFFF3F03000000000003037377777777777F73330800808080
        03333F7F77F7F7F77F3F0308008080800303737F77F737F77F73330080080008
        03333F77F77F777F7F3F03000000000003037377777777777373333333333333
        33333F3F3F3F3F3F3F3F03030303030303037373737373737373333333333333
        3333333333333333333333333333333333333333333333333333333333333333
        33333333333333333333333333333333333333333333333333330000}
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = ScrollMessageClick
    end
    object CreditMessage: TSpeedButton
      Left = 364
      Top = 2
      Width = 22
      Height = 24
      Hint = 'Credit Message Editor'
      Glyph.Data = {
        42010000424D4201000000000000760000002800000011000000110000000100
        040000000000CC00000000000000000000001000000010000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        777770000000777770000000000770000000777770FFFFFFFF07700000007777
        70F000000F0770000000777770FFFFFFFF0770000000777770F000000F077000
        0000777770FFFFFFFF07700000007F778FF000000F077000000078778BFFFFFF
        FF0770000000777F8F8000F00007700000007888FB7FFFF0F077700000007FB8
        BFBFBFB0077770000000778B8B8B000077777000000078B78F78B77777777000
        00007B778B778F7777777000000077778F777777777770000000777777777777
        777770000000}
      ParentShowHint = False
      ShowHint = True
      OnClick = CreditMessageClick
    end
    object ColorPalette: TSpeedButton
      Left = 385
      Top = 2
      Width = 22
      Height = 24
      Hint = 'Color Palette '
      AllowAllUp = True
      GroupIndex = 2
      Glyph.Data = {
        66010000424D6601000000000000760000002800000014000000140000000100
        040000000000F000000000000000000000001000000010000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8888888800008887788887788887788800008800078800078800078800008099
        9070AAA070CCC078000080999070AAA070CCC0780000870907770A07770C0778
        000080999070AAA070CCC078000080999070AAA070CCC0780000800990700AA0
        700CC0780000800990700AA0700CC0780000800990700AA0700CC07800008009
        90700AA0700CC078000080999070AAA070CCC0780000870907770A07770C0778
        000080999070AAA070CCC0780000870907770A07770C0778000080999080AAA0
        70CCC0880000880908880A08880C088800008880888880888880888800008888
        88888888888888880000}
      ParentShowHint = False
      ShowHint = True
      OnClick = ColorPaletteClick
    end
    object DBNavigator1: TDBNavigator
      Left = 407
      Top = 2
      Width = 172
      Height = 24
      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbDelete, nbEdit, nbPost, nbCancel]
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      OnClick = DBNavigator1Click
    end
  end
  object OpenDialog1: TOpenDialog
    Title = 'Open Image'
    Left = 221
    Top = 21
  end
  object SaveDialog1: TSaveDialog
    Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist, ofFileMustExist]
    Left = 303
    Top = 21
  end
  object PrintDialog1: TPrintDialog
    Left = 275
    Top = 21
  end
  object Timer1: TTimer
    OnTimer = Timer1Timer
    Left = 248
    Top = 21
  end
  object MMOpenDialog1: TMMOpenDialog
    AutoDisPlay = True
    AutoPlay = False
    Filter =
      'All Media|*.BMP;*.GIF;*.PCX;*.JPG;*.SCM;*.PNG;*.CMS;*.RTF;*.wav;' +
      '*.mid;*.rmi;*.avi;*.mov;|BMP |*.BMP|GIF |*.GIF|JPG |*.JPG|PCX |*' +
      '.PCX|SCM |*.SCM|PNG |*.PNG|CMS |*.CMS|Wave|*.wav|Midi|*.mid|RMI ' +
      '|*.rmi|AVI |*.avi|Movie|*.mov'
    Title = 'Open File'
    Left = 330
    Top = 20
  end
  object MMSaveDialog1: TMMSaveDialog
    AutoDisPlay = True
    AutoPlay = False
    Filter =
      'All Media|*.BMP;*.GIF;*.PCX;*.JPG;*.SCM;*.PNG;*.CMS;*.RTF;*.wav;' +
      '*.mid;*.rmi;*.avi;*.mov;|BMP |*.BMP|GIF |*.GIF|JPG |*.JPG|PCX |*' +
      '.PCX|SCM |*.SCM|PNG |*.PNG|CMS |*.CMS|Wave|*.wav|Midi|*.mid|RMI ' +
      '|*.rmi|AVI |*.avi|Movie|*.mov'
    Title = 'Save File'
    Left = 357
    Top = 21
  end
  object ThumbPreview1: TThumbPreview
    AutoLoad = False
    Title = 'Image Preview'
    DataFileName = 'thumbs.dat'
    DataFileDir = 'c:\'
    PreviewsDir = 'c:\'
    Left = 192
    Top = 21
  end
end